home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Texteditors / Origami / bindings / vi-fun / modes < prev    next >
Encoding:
Text File  |  1996-09-27  |  3.1 KB  |  118 lines
  1.    {{{  mode comrepmv-mode
  2.    (mode comrepmv-mode
  3.       @lib vi-fun/commandmodek
  4.    )
  5.    }}}
  6.    {{{  mode insert-mode
  7.    (mode insert-mode
  8.      {{{  escaped stuff for command mode
  9.      ; No there is no need to use enter command mode at this point
  10.      @use(USE_INSERT)
  11.      @lib vi-fun/commandmodek
  12.      @use not(USE_INSERT)
  13.      }}}
  14.      (keybind quote-character (C-V))
  15.      (keybind delete-previous-character (C-H))
  16.      (keybind delete-previous-character (C-?))
  17.      (keybind newline-and-indent (C-M))
  18.      (keybind newline-and-indent (C-J))
  19.      (keybind brace-close ("}))
  20.      (keybind close-bracket (")))
  21.      (keybind square-bracket-close ("]))
  22.      ;(keybind describe-bindings (M-"?))
  23.      ;the above line should be modified if this is needed for future tests!
  24.      (keybind suspend-origami (C-Z))
  25.      (keybind space (" ))
  26.      ;start stop and execute macro
  27.      (keybind tabin (C-T))
  28.      (keybind tabout (C-D))
  29.      (keybind enter-command-mode ($esc $esc))
  30.      (keybind vi-get-Xselection (C-X))
  31.    )
  32.    }}}
  33.    {{{  mode parameter-mode
  34.    (mode parameter-mode
  35.      (keybind delete-previous-character ( C-H ))
  36.      (keybind exit-parameter-mode (C-M))
  37.      (keybind suspend-origami (C-Z))
  38.      ;(keybind backward-character ($left))
  39.      ;(keybind forward-character ($right))
  40.      (keybind backward-character (C-P))
  41.      (keybind forward-character (C-N))
  42.      (keybind quote-character (C-V))
  43.    )
  44.    }}}
  45.    {{{  mode ex-mode
  46.    {{{  ex-mode macros
  47.  
  48.    (deffun vi-write-file
  49.     ( parameter-mode
  50.       set still-reading 1
  51.       write-file
  52.       set still-reading 0
  53.     )
  54.    )
  55.    (deffun vi-read-file
  56.     ( parameter-mode
  57.       read-file
  58.     )
  59.    )
  60.    (deffun vi-next-file
  61.     ( next-file
  62.       show-cursor 0
  63.     )
  64.    )
  65.    (deffun vi-save-file
  66.     ( save-file
  67.       show-cursor 0
  68.       enter-command-mode
  69.     )
  70.    )
  71.    (deffun vi-previous-file
  72.     ( previous-file
  73.       show-cursor 0
  74.     )
  75.    )
  76.    (deffun vi-edit-file
  77.     ( ))
  78.    }}}
  79.    (mode ex-mode ; this part of the finite state machine needs to be correncted!
  80.      (keybind newline-and-indent ($esc C-X)) ; This is for emergencies!
  81.      (keybind vi-read-file ("r))
  82.      (keybind vi-save-file ("W))
  83.      (keybind vi-save-file ("w C-M))
  84.      (keybind vi-write-file ("w " ))
  85.      (keybind vi-edit-file ("e))
  86.      (keybind exit-origami ("Q"!)) ; as this is quicker to type
  87.      (keybind exit-origami ("q"!)) ; as this is correct!
  88.      (keybind exit-ex-mode (C-M))
  89.      (keybind suspend-origami (C-Z))
  90.      (keybind describe-bindings ("H))
  91.    )
  92.    }}}
  93.    {{{  mode direct-mode
  94.    (mode direct-mode
  95.     (keybind delete-previous-character ( C-H ))
  96.     (keybind suspend-origami (C-Z))
  97.     (keybind newline-and-indent (C-M))
  98.    )
  99.    }}}
  100.    {{{  mode resize-mode
  101.    (mode resize-mode
  102.     {{{  resize commands consistent with modeori
  103.     (keybind narrow-buffer ("h))
  104.     (keybind shrink-buffer ("j))
  105.     (keybind grow-buffer("k))
  106.     (keybind widen-buffer("l))
  107.     }}}
  108.     {{{  change window in resize mode
  109.     (keybind down-buffer ("J))
  110.     (keybind up-buffer ("K))
  111.     (keybind left-buffer ("H))
  112.     (keybind right-buffer ("L))
  113.     }}}
  114.     (keybind full-size-buffer ("f))
  115.     (keybind enter-command-mode (C-M))
  116.    )
  117.    }}}
  118.